home *** CD-ROM | disk | FTP | other *** search
/ CD Charme 1 / CD Charme 01.iso / mac / hybride / GLOWING / HOLO / CHOOSE.DIR / 00013_Script_13 < prev    next >
Text File  |  1994-12-08  |  591b  |  28 lines
  1. on movieSelect num
  2.   global movieChoice, clipCount
  3.   --global pcholopath, macholopath
  4.   set movieChoice = num
  5.   set clipCount = clipCount + 1
  6.   
  7.   set hit = random (4)
  8.   if hit = 1 then
  9.     puppetSound "YES.AIF"
  10.   else if hit = 2 then
  11.     puppetSound "TWINKLE.AIF"
  12.   else if hit = 3 then
  13.     puppetSound "UHOHSYNT.AIF"
  14.   else if hit = 4 then
  15.     puppetSound "OHGOD.AIF"
  16.   else
  17.     nothing
  18.   end if
  19.   updateStage
  20.   repeat while soundbusy (1)
  21.     -- nothing
  22.   end repeat
  23.   puppetSound 0
  24.   
  25.   unLoadCast
  26.   go to frame "Intro" of movie "VIEWMOV.DIR"
  27.   
  28. end movieSelect